home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet multimedia / Animacje, filmy i prezentacje / Modelowanie 3D / K-3D 0.6.5.0 / k3d-all-in-one-setup-0.6.5.0.exe / k3d-setup-0.6.5.0.exe / share / lsystem / palm-tree.ls < prev    next >
Encoding:
Text File  |  2005-02-12  |  591 b   |  23 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 12
  3. 5
  4. 30
  5. #
  6. c(4)FFS                                         # the actual tree
  7. #
  8. S=FFR>(60)R>(60)R>(60)R>(60)R>(60)R>(30)S       # six branches per segment
  9. R=[Ba]                                          # a single branch
  10. #
  11. a=$tF[Cx]Fb                                     # see bop08.ls
  12. b=$tF[Dy]Fa
  13. #
  14. B=&B                                            # angle increments
  15. C=+C
  16. D=-D
  17. #
  18. x=a                                             # apical elay
  19. y=b
  20. #
  21. F='(1.25)F'(.8)                                 # elongation rate
  22. @
  23.